home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 12 / CU Amiga Magazine's Super CD-ROM 12 (1997)(EMAP Images)(GB)[!][issue 1997-07].iso / CUCD / Games / DestructivePoker / sources / sources.lha / cardpile.cpp < prev    next >
C/C++ Source or Header  |  1997-02-13  |  701b  |  49 lines
  1. /*
  2.  
  3.     cardpile.cpp
  4.  
  5.     V?.?? - ??????  Kimmo Teräväinen
  6.  
  7.         look cardpile.h
  8.  
  9. */
  10.  
  11. #include "cardpile.h"
  12.  
  13. cIMGCard *cCardPile::Deal() {
  14.   cIMGCard *card;
  15.   if(!n) return NULL;
  16.   card=cards[--n];
  17.   return card;
  18. }
  19.  
  20.  
  21. cIMGCard *cCardPile::Remove(int pos) {
  22.   cIMGCard *card;
  23.   if(pos>=n || pos<0) return NULL;;
  24.   card=cards[pos];
  25.   cards[pos]=cards[--n];
  26.   return card;
  27. }
  28.  
  29.  
  30. void cCardPile::Insert(cIMGCard *card)
  31. {
  32.   if(card) {
  33.     insert(card);
  34.     card->CanTurn(FALSE);
  35.     card->Turn_CoverDown();
  36.     card->MoveTo(pos);
  37.     if(n>0) {
  38.       card->Hide();
  39.       cards[0]->Show();
  40.     }
  41.   }
  42. }
  43.  
  44.  
  45. void cCardPile::Insert(cCardPile &pile) {
  46.   cIMGCard *card;
  47.   while((card=pile.Deal())!=NULL) Insert(card);
  48. }
  49.